**********************************************************************************************
* Reproduces Table A3
*
* Ajzenman, Elacqua, Jaimovich and Pérez-Núñez (2024)."Humans versus Chatbots: Scaling-up behavioral interventions to reduce teacher shortages"  	  		
*
**********************************************************************************************


 *The initial bot was activated on 11/30/2021, identified as 22614. Exclude individuals who received human interventions prior to this date.
 
preserve
drop if fecha_date<22614 & grupo_gen==1


///// Preschool Outcomes

*Preferences and Enrollment in Preschool Programs: Human and Bot Effects. Only students who were exposed to the treatment during weeks when there was overlap in the timing of both human and bot interventions.

reg preschool_rankfirst i.grupo_gen education_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA3a.tex", replace sdec(4) tex  keep(i.grupo_gen)  addstat(Mean of dependent variable, e(ymean))  nocons


foreach var in preschool_proportion preschool_listed d_enroll_preschool{
	
reg `var' i.grupo_gen education_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA3a.tex", append sdec(4) tex  keep(i.grupo_gen)  addstat(Mean of dependent variable, e(ymean))  nocons
eststo clear
}

*Human vs Bot effect differences p-value
foreach var in preschool_rankfirst preschool_proportion preschool_listed d_enroll_preschool{
	
reg `var' i.grupo_gen education_preference sexo i.dependencia_colegio top_30,r
test 1.grupo_gen=2.grupo_gen	
}




///// Primary Outcomes

*Preferences and Enrollment in primart¿y Programs: Human and Bot Effects. Only students who were exposed to the treatment during weeks when there was overlap in the timing of both human and bot interventions.
reg primary_rankfirst i.grupo_gen education_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA3b.tex", replace sdec(4) tex  keep(i.grupo_gen)  addstat(Mean of dependent variable, e(ymean)) label nocons


foreach var in primary_proportion primary_listed d_enroll_primary{
	
reg `var' i.grupo_gen education_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA3b.tex", append sdec(4) tex  keep(i.grupo_gen)  addstat(Mean of dependent variable, e(ymean)) label nocons
eststo clear
}

*Human vs Bot effect differences p-value
foreach var in primary_rankfirst primary_proportion primary_listed d_enroll_primary{
	
reg `var' i.grupo_gen education_preference sexo i.dependencia_colegio top_30,r
test 1.grupo_gen=2.grupo_gen	
}




///// Specialized Outcomes

*Preferences and Enrollment in Educational Programs: Human and Bot Effects. Only students who were exposed to the treatment during weeks when there was overlap in the timing of both human and bot interventions.

reg specialized_rankfirst i.grupo_gen education_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA3c.tex", replace sdec(4) tex  keep(i.grupo_gen)  addstat(Mean of dependent variable, e(ymean))  nocons


foreach var in specialized_prop specialized_listed d_enroll_specialized{
	
reg `var' i.grupo_gen education_preference sexo i.dependencia_colegio top_30,r
estadd ysumm 
outreg2 using "${output}/TableA3c.tex", append sdec(4) tex  keep(i.grupo_gen)  addstat(Mean of dependent variable, e(ymean))  nocons
eststo clear
}

*Human vs Bot effect differences p-value
foreach var in specialized_rankfirst specialized_prop specialized_listed d_enroll_specialized{
	
reg `var' i.grupo_gen education_preference sexo i.dependencia_colegio top_30,r
test 1.grupo_gen=2.grupo_gen	
}

restore 

*Note: Calculations of the significant difference in the bot vs human effect were manually added to the table according to the results produced by the commands run earlier in this code.